A$=GETS$("SYSTEXT",1)
GEAR LOAD "多色フレーム","b:\"+A$+".tif"
DSP SHOW "多色フレーム"
CLRF "HP"
CLRF "L"
CLRF "怪物"
CLRF "ｱﾄ"
PUTS "ｱﾄ",GETS$("SYSTEXT",5),1
PUTS "HP",GETS$("SYSTEXT",2),1
PUTS "L",GETS$("SYSTEXT",3),1
PUTS "怪物",STR$(30),1
GO "音楽1"